program adr;

uses
  SysUtils,
  Forms,
  Main in 'Main.pas' {fmMain},
  KladrUnit in 'KladrUnit.pas',
  DataSetUtils in 'DataSetUtils.pas',
  TextEditor in 'TextEditor.pas' {fmTextEditor},
  XmlTV in 'XmlTV.pas' {fmXmlTV},
  SqlUtils in 'SqlUtils.pas',
  MSXML2_TLB in 'MSXML2_TLB.pas',
  Splash in 'Splash.pas' {fmSplash},
  PersonSearch in 'PersonSearch.pas' {fmPersonSearch};

{$R *.RES}

begin
  Application.Initialize;
  //DecimalSeparator := '.';
  fmSplash := TfmSplash.Create(Application);
  fmSplash.Show;
  fmSplash.Update;
  //
  Application.CreateForm(TfmMain, fmMain);
  Application.CreateForm(TfmTextEditor, fmTextEditor);
  Application.CreateForm(TfmXmlTV, fmXmlTV);
  Application.CreateForm(TfmPersonSearch, fmPersonSearch);
  fmSplash.Free;
  Application.Run;
end.
